Function GetDataFile(Name:String;Number:Word;FName:String):Word;

    The item with name  Name  and  number  Number  is  extracted  to file
    FName.  The data is  not  deleted  from  the database.  The data need
    not have been inserted with NewDataFile.